Removes a nuclear spin from a spin system.
NewSys = nucspinrmv(Sys,idx)
This function removes one ro more nuclear spins from the spin
system Sys and returns the resulting spin system
in NewSys.
idx specifies the indices of the nuclei to remove.
E.g., idx=1 indicates the first nucleus, idx=[2 4]
indicates the second and the fourth nuclei.
First we define a spin system with 2 nuclei
Sys = struct('S',1/2,'g',[2 2 2.2]);
Sys = nucspinadd(Sys,'63Cu',[50 50 520]);
Sys = nucspinadd(Sys,'14N',[3 3 9],[],[-1 -1 2])
The following removes the nitrogen nucleus
Sys = nucspinrmv(Sys,2)
spin system structures, nucspinadd